home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 30 / PC Gamer IT CD 30 1-2.iso / MOTS / GAMEDATA / RESOURCE / JKMRES.GOO / cog_item_bacta.cog < prev    next >
Text File  |  1998-02-25  |  849b  |  47 lines
  1. # Jedi Knight Cog Script
  2. #
  3. # ITEM_BACTA.COG
  4. #
  5. # INVENTORY script - Bacta Tank
  6. #
  7. # [CYW & YB]
  8. #
  9. # (C) 1997 LucasArts Entertainment Co. All Rights Reserved
  10. # ========================================================================================
  11.  
  12. symbols
  13.  
  14. sound            bactaSnd=BactaUse01.WAV
  15. thing            player
  16.  
  17. message        activated
  18.  
  19. end
  20.  
  21. # ========================================================================================
  22.  
  23. code
  24.  
  25. activated:
  26.     player = GetSourceRef();
  27.     if(GetInv(player, 40) > 0.0)
  28.     {
  29.         if(GetHealth(player) < 100)
  30.         {
  31.             // Print("Using Bacta");
  32.             jkPrintUNIString(player, 250);
  33.          PlaySoundThing(bactaSnd, player, 1.0, -1, -1, 128);
  34.             HealThing(player, 30.0);
  35.             ChangeInv(player, 40, -1.0);
  36.             if(GetInv(player, 40) == 0) SetInvAvailable(player, 40, 0);
  37.         }
  38.     }
  39.     
  40.     Return;
  41.  
  42. end
  43.  
  44.  
  45.  
  46.  
  47.